Abstract
Put out a timeseries graph via ggplot2plotlylibrary(tidyverse) # dplyr, part of tidyverse, has spread() & gather()
library(plotly)
trump <- read_csv("https://projects.fivethirtyeight.com/trump-approval-data/approval_topline.csv",
col_types = cols(modeldate = col_date(format = "%m/%d/%Y"),
timestamp = col_datetime(format = "%H:%M:%S %d %b %Y ")))
trump
trump_over_under <- trump %>%
filter(subgroup == "All polls") %>%
select(modeldate, approve_estimate, disapprove_estimate) %>%
gather("pol_type", "score", -modeldate)
trump_over_under
ts_4_ggpltly <- ggplot(trump_over_under, aes(x = modeldate, y = score, color = pol_type)) +
geom_line() +
scale_color_manual(values = c("forestgreen", "firebrick"),
labels = c("Approve", "Disapprove")) +
labs(x = "Date", y = "Approval Rating",
color = "",
caption = "Data Source: fivethirtyeight.com")
ts_4_ggpltly
ggplotly(ts_4_ggpltly)
# Example from tk_ts documentation
data_tbl <- tibble::tibble(
date = seq.Date(as.Date("2016-01-01"), by = 1, length.out = 5),
x = rep("chr values", 5),
y = cumsum(1:5),
z = cumsum(11:15) * rnorm(1))
data_tbl
tk_ts(data_tbl, start = 2016)
# Working but the x axis is bonk
ap_4_dy <- allpolls %>%
select(modeldate, approve_estimate, disapprove_estimate) %>%
tk_ts(start = 20170201)
ap_4_dy <- allpolls %>%
select(modeldate, approve_estimate, disapprove_estimate) %>%
#tk_ts()
tk_ts(start = 2017, freq = 365)
ap_4_dy
#idx <- tk_index(allpolls)
This is what was working, even with the bonk x axis
ap_4_dy %>%
dygraph() %>%
dyRangeSelector(dateWindow = c("2017-02-01", "2018-11-30"))
# from dygraph documentation
class(mdeaths)
head(mdeaths)
lungDeaths <- cbind(mdeaths, fdeaths)
dygraph(lungDeaths)
sessioninfo::session_info()
- Session info -------------------------------------------------------
- Packages -----------------------------------------------------------
package * version date lib source
assertthat 0.2.0 2017-04-11 [2] CRAN (R 3.5.1)
backports 1.1.3 2018-12-14 [2] CRAN (R 3.5.2)
bindr 0.1.1 2018-03-13 [2] CRAN (R 3.5.1)
bindrcpp * 0.2.2 2018-03-29 [2] CRAN (R 3.5.1)
broom 0.5.1 2018-12-05 [2] CRAN (R 3.5.2)
cellranger 1.1.0 2016-07-27 [2] CRAN (R 3.5.1)
cli 1.0.1 2018-09-25 [2] CRAN (R 3.5.1)
colorspace 1.4-0 2019-01-13 [1] CRAN (R 3.5.2)
crayon 1.3.4 2017-09-16 [2] CRAN (R 3.5.1)
crosstalk 1.0.0 2016-12-21 [2] CRAN (R 3.5.1)
curl 3.2 2018-03-28 [2] CRAN (R 3.5.1)
data.table 1.11.8 2018-09-30 [2] CRAN (R 3.5.1)
digest 0.6.18 2018-10-10 [2] CRAN (R 3.5.1)
dplyr * 0.7.8 2018-11-10 [2] CRAN (R 3.5.2)
forcats * 0.3.0 2018-02-19 [2] CRAN (R 3.5.1)
generics 0.0.2 2018-11-29 [2] CRAN (R 3.5.2)
ggplot2 * 3.1.0 2018-10-25 [1] CRAN (R 3.5.2)
glue 1.3.0 2018-07-17 [2] CRAN (R 3.5.1)
gtable 0.2.0 2016-02-26 [2] CRAN (R 3.5.1)
haven 2.0.0 2018-11-22 [2] CRAN (R 3.5.2)
hms 0.4.2 2018-03-10 [2] CRAN (R 3.5.1)
htmltools 0.3.6 2017-04-28 [2] CRAN (R 3.5.1)
htmlwidgets 1.3 2018-09-30 [2] CRAN (R 3.5.1)
httpuv 1.4.5.1 2018-12-18 [1] CRAN (R 3.5.2)
httr 1.4.0 2018-12-11 [2] CRAN (R 3.5.2)
jsonlite 1.6 2018-12-07 [2] CRAN (R 3.5.2)
knitr 1.21 2018-12-10 [1] CRAN (R 3.5.2)
labeling 0.3 2014-08-23 [2] CRAN (R 3.5.0)
later 0.8.0 2019-02-11 [1] CRAN (R 3.5.2)
lattice 0.20-38 2018-11-04 [2] CRAN (R 3.5.2)
lazyeval 0.2.1 2017-10-29 [2] CRAN (R 3.5.1)
lubridate 1.7.4 2018-04-11 [2] CRAN (R 3.5.1)
magrittr 1.5 2014-11-22 [2] CRAN (R 3.5.1)
mime 0.6 2018-10-05 [1] CRAN (R 3.5.1)
modelr 0.1.2 2018-05-11 [2] CRAN (R 3.5.1)
munsell 0.5.0 2018-06-12 [2] CRAN (R 3.5.1)
nlme 3.1-137 2018-04-07 [2] CRAN (R 3.5.2)
pillar 1.3.1 2018-12-15 [2] CRAN (R 3.5.2)
pkgconfig 2.0.2 2018-08-16 [2] CRAN (R 3.5.1)
plotly * 4.8.0 2018-07-20 [1] CRAN (R 3.5.1)
plyr 1.8.4 2016-06-08 [2] CRAN (R 3.5.1)
promises 1.0.1 2018-04-13 [1] CRAN (R 3.5.1)
purrr * 0.2.5 2018-05-29 [2] CRAN (R 3.5.1)
R6 2.4.0 2019-02-14 [2] CRAN (R 3.5.2)
Rcpp 1.0.0 2018-11-07 [2] CRAN (R 3.5.2)
readr * 1.3.1 2018-12-21 [1] CRAN (R 3.5.2)
readxl 1.2.0 2018-12-19 [2] CRAN (R 3.5.2)
rlang 0.3.1 2019-01-08 [2] CRAN (R 3.5.2)
rstudioapi 0.9.0 2019-01-09 [2] CRAN (R 3.5.1)
rvest 0.3.2 2016-06-17 [2] CRAN (R 3.5.1)
scales 1.0.0 2018-08-09 [2] CRAN (R 3.5.1)
sessioninfo 1.1.1 2018-11-05 [2] CRAN (R 3.5.2)
shiny 1.2.0 2018-11-02 [2] CRAN (R 3.5.2)
stringi 1.3.1 2019-02-13 [2] CRAN (R 3.5.2)
stringr * 1.4.0 2019-02-10 [2] CRAN (R 3.5.2)
tibble * 2.0.1 2019-01-12 [2] CRAN (R 3.5.2)
tidyr * 0.8.2 2018-10-28 [2] CRAN (R 3.5.2)
tidyselect 0.2.5 2018-10-11 [2] CRAN (R 3.5.1)
tidyverse * 1.2.1 2017-11-14 [2] CRAN (R 3.5.1)
viridisLite 0.3.0 2018-02-01 [2] CRAN (R 3.5.1)
withr 2.1.2 2018-03-15 [2] CRAN (R 3.5.1)
xfun 0.4 2018-10-23 [2] CRAN (R 3.5.2)
xml2 1.2.0 2018-01-24 [1] CRAN (R 3.5.1)
xtable 1.8-3 2018-08-29 [2] CRAN (R 3.5.1)
yaml 2.2.0 2018-07-25 [2] CRAN (R 3.5.1)
[1] C:/Users/jrl/Documents/R/win-library/3.5
[2] C:/Users/jrl/Documents/R/R-3.5.2/library